Exemple de série en ggplot

Séries chronologiques taux de chômage annuel en fonction du sexe

# Importation du fichier
ho_fe_chom = read_excel("homme_femme_chomage.xlsx",sheet=1,col_names = TRUE)

Pour pouvoir réaliser un grahique en ggplot, il faut que toutes les données soient groupées dans une même colonne.

De plus, pour distinguer les informations par sexe, une colonne “type” doit exister ainsi qu’une colonne “Annee” pour avoir la période étudiée.

# Mise en forme des données
ho_fe_chom$ho <- rep("H", nrow(ho_fe_chom))
ho_fe_chom$fe <- rep("F", nrow(ho_fe_chom))
ho_fe_chom$cho_ens <- rep("Ensemble", nrow(ho_fe_chom))

ho <- data.frame(Annee = ho_fe_chom[,1], Taux_chom = ho_fe_chom[,3], Type = ho_fe_chom[,5])
ho <- ho[-1,]

fe <- data.frame(Annee = ho_fe_chom[,1], Taux_chom = ho_fe_chom[,4], Type = ho_fe_chom[,6])
fe <- fe[-1,]

cho_ens <- data.frame(Annee = ho_fe_chom[,1], Taux_chom = ho_fe_chom[,2], Type = ho_fe_chom[,7])
cho_ens <- cho_ens[-1,] 

taux_chom_sex <- rbind(ho, fe, cho_ens) # Tableau que l'on va dessiner

# On dessine la série
library(ggplot2)
ggplot(data=taux_chom_sex,aes(Annee, as.numeric(as.character(Taux_chom)), group=Type)) + theme(legend.position="bottom") + geom_line(aes(color=Type),size=1.5) + ggtitle("Taux de chômage en fonction du sexe") + scale_color_manual(
  values=c("#4286f4","#e85f88","black")
) + ylab("Taux de chômage")